/ Archive Magazine CD 1995 / Archive Magazine CD 1995.iso / discs / prog_disc / volume_3 / issue06 / comp / comp_dec89 / bmawerb

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 1c f4 20 3e 20 | 24 2e 43 6f 6d 70 5f 44 |..... > |$.Comp_D|
|00000010| 65 63 38 39 2e 42 4d 61 | 77 65 72 42 0d 00 14 2f |ec89.BMa|werB.../|
|00000020| 20 dc 20 31 31 2c 33 32 | 2c 33 32 2c 37 32 3a 52 | . 11,32|,32,72:R|
|00000030| 45 4d 20 70 69 6e 74 73 | 20 69 6e 20 41 72 63 68 |EM pints| in Arch|
|00000040| 69 76 65 20 50 72 6f 62 | 6c 65 6d 0d 00 1e 20 de |ive Prob|lem... .|
|00000050| 20 6f 72 69 67 69 6e 78 | 25 28 34 29 3a f4 20 66 | originx|%(4):. f|
|00000060| 6f 72 20 65 61 63 68 20 | 6a 75 67 0d 00 28 0f 6f |or each |jug..(.o|
|00000070| 72 69 67 69 6e 79 25 3d | 35 30 0d 00 64 0f f2 68 |riginy%=|50..d..h|
|00000080| 65 61 64 69 6e 67 65 74 | 63 0d 00 c8 0f f2 6a 75 |eadinget|c.....ju|
|00000090| 67 66 69 6c 6c 69 6e 67 | 0d 01 2c 40 db 3a e8 27 |gfilling|..,@.:.'|
|000000a0| 27 22 57 6f 75 6c 64 20 | 79 6f 75 20 6c 69 6b 65 |'"Would |you like|
|000000b0| 20 74 6f 20 73 65 65 20 | 68 6f 77 20 69 74 20 63 | to see |how it c|
|000000c0| 61 6e 20 62 65 20 64 6f | 6e 65 3f 20 28 59 6f 72 |an be do|ne? (Yor|
|000000d0| 4e 29 22 3b 61 6e 73 24 | 0d 01 36 1d e7 20 61 6e |N)";ans$|..6.. an|
|000000e0| 73 24 3d 22 4e 22 20 84 | 20 61 6e 73 24 3d 22 6e |s$="N" .| ans$="n|
|000000f0| 22 20 8c 20 e0 0d 01 3b | 0e f2 72 65 73 65 74 6a |" . ...;|..resetj|
|00000100| 75 67 73 0d 01 40 0e f2 | 6a 75 67 6d 65 74 68 6f |ugs..@..|jugmetho|
|00000110| 64 0d 03 de 05 e0 0d 07 | d0 10 dd f2 68 65 61 64 |d.......|....head|
|00000120| 69 6e 67 65 74 63 0d 07 | d5 26 de 20 56 25 28 34 |ingetc..|.&. V%(4|
|00000130| 29 2c 72 25 28 34 29 2c | 68 25 28 34 29 2c 76 6f |),r%(4),|h%(4),vo|
|00000140| 6c 25 28 34 29 2c 64 68 | 25 28 34 29 0d 07 d6 1d |l%(4),dh|%(4)....|
|00000150| e3 20 6a 75 67 25 3d 31 | 20 b8 20 34 3a f3 20 56 |. jug%=1| . 4:. V|
|00000160| 25 28 6a 75 67 25 29 3a | ed 0d 07 da 09 db 3a eb |%(jug%):|......:.|
|00000170| 31 32 0d 07 e4 12 ef 20 | 32 38 2c 30 2c 31 30 2c |12..... |28,0,10,|
|00000180| 37 39 2c 30 0d 07 ee 18 | f1 20 8a 33 35 29 20 22 |79,0....|. .35) "|
|00000190| 4a 55 47 2d 46 49 4c 4c | 49 4e 47 22 0d 07 f8 6a |JUG-FILL|ING"...j|
|000001a0| f1 27 27 22 46 6f 75 72 | 20 6a 75 67 73 20 41 2c |.''"Four| jugs A,|
|000001b0| 42 2c 43 2c 44 20 68 61 | 76 65 20 76 6f 6c 75 6d |B,C,D ha|ve volum|
|000001c0| 65 73 20 22 3b 56 25 28 | 31 29 20 3b 22 2c 20 22 |es ";V%(|1) ;", "|
|000001d0| 3b 56 25 28 32 29 20 3b | 22 2c 20 22 3b 56 25 28 |;V%(2) ;|", ";V%(|
|000001e0| 33 29 20 3b 22 2c 20 22 | 3b 56 25 28 34 29 20 3b |3) ;", "|;V%(4) ;|
|000001f0| 22 20 70 69 6e 74 73 20 | 72 65 73 70 65 63 74 69 |" pints |respecti|
|00000200| 76 65 6c 79 2e 22 0d 07 | fd 1a f1 27 27 22 50 52 |vely."..|...''"PR|
|00000210| 45 53 53 20 41 4e 59 20 | 4b 45 59 22 3a 58 3d a5 |ESS ANY |KEY":X=.|
|00000220| 0d 08 02 0c f2 6a 75 67 | 64 69 6d 73 0d 08 0c 30 |.....jug|dims...0|
|00000230| e3 20 6a 75 67 25 3d 31 | 20 b8 20 34 3a f2 64 72 |. jug%=1| . 4:.dr|
|00000240| 61 77 6a 75 67 3a ed 20 | 3a f1 22 50 52 45 53 53 |awjug:. |:."PRESS|
|00000250| 41 4e 59 20 4b 45 59 22 | 3a 58 3d a5 0d 08 16 33 |ANY KEY"|:X=....3|
|00000260| f1 27 27 22 49 4e 49 54 | 49 41 4c 4c 59 2c 20 6a |.''"INIT|IALLY, j|
|00000270| 75 67 20 44 20 69 73 20 | 66 75 6c 6c 2c 20 74 68 |ug D is |full, th|
|00000280| 65 20 6f 74 68 65 72 73 | 20 65 6d 70 74 79 22 0d |e others| empty".|
|00000290| 08 17 1e 6a 75 67 25 3d | 34 3a 76 6f 6c 25 28 6a |...jug%=|4:vol%(j|
|000002a0| 75 67 25 29 3d 30 3a 66 | 69 6c 6c 3d b9 0d 08 18 |ug%)=0:f|ill=....|
|000002b0| 12 f2 6a 75 67 66 69 6c | 6c 28 6a 75 67 25 29 0d |..jugfil|l(jug%).|
|000002c0| 08 1b 05 db 0d 08 1d 54 | f1 22 54 68 65 20 6f 62 |.......T|."The ob|
|000002d0| 6a 65 63 74 20 69 73 20 | 74 6f 20 64 69 76 69 64 |ject is |to divid|
|000002e0| 65 20 65 71 75 61 6c 6c | 79 20 74 68 65 20 63 6f |e equall|y the co|
|000002f0| 6e 74 65 6e 74 73 20 6f | 66 20 4a 75 67 20 44 20 |ntents o|f Jug D |
|00000300| 62 65 74 77 65 65 6e 20 | 4a 75 67 73 20 62 2c 63 |between |Jugs b,c|
|00000310| 2c 20 61 6e 64 20 44 22 | 0d 08 1f 6a f1 27 27 22 |, and D"|...j.''"|
|00000320| 54 68 65 20 4a 75 67 73 | 20 61 72 65 20 75 6e 67 |The Jugs| are ung|
|00000330| 72 61 64 75 61 74 65 64 | 20 62 75 74 20 61 20 70 |raduated| but a p|
|00000340| 6f 75 72 69 6e 67 20 6d | 61 79 20 63 6f 6e 74 69 |ouring m|ay conti|
|00000350| 6e 75 65 20 75 6e 74 69 | 6c 20 65 69 74 68 65 72 |nue unti|l either|
|00000360| 20 61 20 4a 75 67 20 69 | 73 20 66 75 6c 6c 20 6f | a Jug i|s full o|
|00000370| 72 20 61 20 4a 75 67 20 | 69 73 20 65 6d 70 74 79 |r a Jug |is empty|
|00000380| 2e 22 0d 08 21 6a f1 27 | 27 22 20 59 6f 75 20 77 |."..!j.'|'" You w|
|00000390| 69 6c 6c 20 62 65 20 70 | 72 6f 6d 70 74 65 64 20 |ill be p|rompted |
|000003a0| 74 6f 20 73 65 6c 65 63 | 74 20 61 20 4a 75 67 20 |to selec|t a Jug |
|000003b0| 74 6f 20 70 6f 75 72 20 | 46 52 4f 4d 20 61 6e 64 |to pour |FROM and|
|000003c0| 20 61 20 4a 75 67 20 74 | 6f 20 70 6f 75 72 20 54 | a Jug t|o pour T|
|000003d0| 4f 2c 20 73 65 6c 65 63 | 74 69 6e 67 20 41 2c 20 |O, selec|ting A, |
|000003e0| 42 2c 20 43 2c 20 6f 72 | 20 44 2e 22 0d 08 23 3f |B, C, or| D."..#?|
|000003f0| 20 f1 27 27 22 49 6e 69 | 74 69 61 6c 6c 79 2c 79 | .''"Ini|tially,y|
|00000400| 6f 75 20 6d 69 67 68 74 | 20 73 65 6c 65 63 74 20 |ou might| select |
|00000410| 70 6f 75 72 20 46 52 4f | 4d 20 44 20 61 6e 64 20 |pour FRO|M D and |
|00000420| 50 4f 55 52 20 54 4f 20 | 41 3a 22 0d 08 25 26 f1 |POUR TO |A:"..%&.|
|00000430| 27 27 22 50 72 65 73 73 | 20 61 6e 79 20 6b 65 79 |''"Press| any key|
|00000440| 20 74 6f 20 63 6f 6e 74 | 69 6e 75 65 22 3a 58 3d | to cont|inue":X=|
|00000450| a5 0d 08 27 1d 63 6f 75 | 6e 74 3d 30 3a 66 72 6f |...'.cou|nt=0:fro|
|00000460| 6d 24 3d 22 44 22 3a 74 | 6f 24 3d 22 41 22 0d 08 |m$="D":t|o$="A"..|
|00000470| 29 18 f2 70 6f 75 72 6a | 75 67 73 28 66 72 6f 6d |)..pourj|ugs(from|
|00000480| 24 2c 74 6f 24 29 0d 08 | 2a 2d f1 27 27 22 50 52 |$,to$)..|*-.''"PR|
|00000490| 45 53 53 20 41 4e 59 20 | 4b 45 59 20 74 6f 20 72 |ESS ANY |KEY to r|
|000004a0| 65 74 75 72 6e 20 74 6f | 20 73 74 61 72 74 22 3a |eturn to| start":|
|000004b0| 58 3d a5 0d 08 2f 0e f2 | 72 65 73 65 74 6a 75 67 |X=.../..|resetjug|
|000004c0| 73 0d 08 31 05 e1 0d 08 | 34 0d dd f2 6a 75 67 64 |s..1....|4...jugd|
|000004d0| 69 6d 73 0d 08 3e 10 e3 | 20 6a 75 67 25 3d 31 20 |ims..>..| jug%=1 |
|000004e0| b8 20 34 0d 08 48 2a 72 | 25 28 6a 75 67 25 29 3d |. 4..H*r|%(jug%)=|
|000004f0| 33 2a 28 56 25 28 6a 75 | 67 25 29 2a 31 30 30 30 |3*(V%(ju|g%)*1000|
|00000500| 81 28 33 2a af 29 29 5e | 28 31 2f 33 29 0d 08 52 |.(3*.))^|(1/3)..R|
|00000510| 17 68 25 28 6a 75 67 25 | 29 3d 33 2a 72 25 28 6a |.h%(jug%|)=3*r%(j|
|00000520| 75 67 25 29 0d 08 57 1f | 64 68 25 28 6a 75 67 25 |ug%)..W.|dh%(jug%|
|00000530| 29 3d 68 25 28 6a 75 67 | 25 29 81 56 25 28 6a 75 |)=h%(jug|%).V%(ju|
|00000540| 67 25 29 0d 08 5c 20 6f | 72 69 67 69 6e 78 25 28 |g%)..\ o|riginx%(|
|00000550| 6a 75 67 25 29 3d 28 31 | 32 34 30 2a 6a 75 67 25 |jug%)=(1|240*jug%|
|00000560| 29 81 35 0d 08 61 10 76 | 6f 6c 25 28 6a 75 67 25 |).5..a.v|ol%(jug%|
|00000570| 29 3d 30 0d 08 66 05 ed | 0d 08 8e 05 e1 0d 08 98 |)=0..f..|........|
|00000580| 0d dd f2 64 72 61 77 6a | 75 67 0d 08 9d 18 ef 35 |...drawj|ug.....5|
|00000590| 3a ef 32 34 2c 30 3b 30 | 3b 31 32 37 39 3b 35 30 |:.24,0;0|;1279;50|
|000005a0| 30 3b 0d 08 a2 35 ec 20 | 28 6f 72 69 67 69 6e 78 |0;...5. |(originx|
|000005b0| 25 28 6a 75 67 25 29 20 | 2d 20 72 25 28 6a 75 67 |%(jug%) |- r%(jug|
|000005c0| 25 29 29 2c 28 6f 72 69 | 67 69 6e 79 25 2b 68 25 |%)),(ori|giny%+h%|
|000005d0| 28 6a 75 67 25 29 29 0d | 08 ac 2c df 20 28 6f 72 |(jug%)).|..,. (or|
|000005e0| 69 67 69 6e 78 25 28 6a | 75 67 25 29 20 2d 20 72 |iginx%(j|ug%) - r|
|000005f0| 25 28 6a 75 67 25 29 29 | 2c 28 6f 72 69 67 69 6e |%(jug%))|,(origin|
|00000600| 79 25 29 0d 08 b6 2c df | 20 28 6f 72 69 67 69 6e |y%)...,.| (origin|
|00000610| 78 25 28 6a 75 67 25 29 | 20 2b 20 72 25 28 6a 75 |x%(jug%)| + r%(ju|
|00000620| 67 25 29 29 2c 28 6f 72 | 69 67 69 6e 79 25 29 0d |g%)),(or|iginy%).|
|00000630| 08 c0 53 df 20 28 6f 72 | 69 67 69 6e 78 25 28 6a |..S. (or|iginx%(j|
|00000640| 75 67 25 29 20 2b 20 72 | 25 28 6a 75 67 25 29 29 |ug%) + r|%(jug%))|
|00000650| 2c 28 6f 72 69 67 69 6e | 79 25 2b 68 25 28 6a 75 |,(origin|y%+h%(ju|
|00000660| 67 25 29 29 3a f1 20 22 | 20 22 3b bd 28 6a 75 67 |g%)):. "| ";.(jug|
|00000670| 25 2b 36 34 29 3b 22 3d | 22 3b 56 25 28 6a 75 67 |%+64);"=|";V%(jug|
|00000680| 25 29 0d 08 c5 30 ec 20 | 6f 72 69 67 69 6e 78 25 |%)...0. |originx%|
|00000690| 28 6a 75 67 25 29 2d 31 | 36 2c 6f 72 69 67 69 6e |(jug%)-1|6,origin|
|000006a0| 79 25 2d 31 36 3a f1 3b | 76 6f 6c 25 28 6a 75 67 |y%-16:.;|vol%(jug|
|000006b0| 25 29 0d 08 c9 06 ef 34 | 0d 08 ca 05 e1 0d 08 fc |%).....4|........|
|000006c0| 13 dd f2 6a 75 67 66 69 | 6c 6c 28 6a 75 67 25 29 |...jugfi|ll(jug%)|
|000006d0| 0d 09 10 2d e7 20 66 69 | 6c 6c 3d a3 20 8c 20 64 |...-. fi|ll=. . d|
|000006e0| 68 25 3d 2d 64 68 25 28 | 6a 75 67 25 29 20 8b 20 |h%=-dh%(|jug%) . |
|000006f0| 64 68 25 3d 64 68 25 28 | 6a 75 67 25 29 0d 09 1a |dh%=dh%(|jug%)...|
|00000700| 05 f5 0d 09 24 58 c8 93 | 20 c8 90 20 28 6f 72 69 |....$X..| .. (ori|
|00000710| 67 69 6e 78 25 28 6a 75 | 67 25 29 2d 72 25 28 6a |ginx%(ju|g%)-r%(j|
|00000720| 75 67 25 29 29 2c 6f 72 | 69 67 69 6e 79 25 2b 68 |ug%)),or|iginy%+h|
|00000730| 25 28 6a 75 67 25 29 2a | 76 6f 6c 25 28 6a 75 67 |%(jug%)*|vol%(jug|
|00000740| 25 29 2f 56 25 28 6a 75 | 67 25 29 2c 32 2a 72 25 |%)/V%(ju|g%),2*r%|
|00000750| 28 6a 75 67 25 29 2c 64 | 68 25 0d 09 27 3e e7 20 |(jug%),d|h%..'>. |
|00000760| 64 68 25 3c 30 20 8c 20 | 76 6f 6c 25 28 6a 75 67 |dh%<0 . |vol%(jug|
|00000770| 25 29 3d 76 6f 6c 25 28 | 6a 75 67 25 29 2d 31 20 |%)=vol%(|jug%)-1 |
|00000780| 8b 76 6f 6c 25 28 6a 75 | 67 25 29 3d 76 6f 6c 25 |.vol%(ju|g%)=vol%|
|00000790| 28 6a 75 67 25 29 2b 31 | 0d 09 28 3a ef 35 3a ec |(jug%)+1|..(:.5:.|
|000007a0| 20 6f 72 69 67 69 6e 78 | 25 28 6a 75 67 25 29 2d | originx|%(jug%)-|
|000007b0| 31 36 2c 6f 72 69 67 69 | 6e 79 25 2d 31 36 3a e6 |16,origi|ny%-16:.|
|000007c0| 30 2c 30 3a f1 3b 76 6f | 6c 25 28 6a 75 67 25 29 |0,0:.;vo|l%(jug%)|
|000007d0| 2d 31 0d 09 29 35 ec 20 | 6f 72 69 67 69 6e 78 25 |-1..)5. |originx%|
|000007e0| 28 6a 75 67 25 29 2d 31 | 36 2c 6f 72 69 67 69 6e |(jug%)-1|6,origin|
|000007f0| 79 25 2d 31 36 3a e6 30 | 2c 37 3a f1 3b 76 6f 6c |y%-16:.0|,7:.;vol|
|00000800| 25 28 6a 75 67 25 29 0d | 09 2e 0b 58 3d a6 28 31 |%(jug%).|...X=.(1|
|00000810| 30 29 0d 09 38 28 fd 20 | 76 6f 6c 25 28 6a 75 67 |0)..8(. |vol%(jug|
|00000820| 25 29 3d 56 25 28 6a 75 | 67 25 29 20 84 20 76 6f |%)=V%(ju|g%) . vo|
|00000830| 6c 25 28 6a 75 67 25 29 | 3d 30 0d 09 3d 06 ef 34 |l%(jug%)|=0..=..4|
|00000840| 0d 09 56 05 e1 0d 09 c4 | 19 dd f2 70 6f 75 72 6a |..V.....|...pourj|
|00000850| 75 67 73 28 66 72 6f 6d | 24 2c 74 6f 24 29 0d 09 |ugs(from|$,to$)..|
|00000860| ce 0e 73 74 6f 70 70 6f | 75 72 3d a3 0d 09 d8 05 |..stoppo|ur=.....|
|00000870| f5 0d 09 e2 0e c8 8e 20 | 66 72 6f 6d 24 20 ca 0d |....... |from$ ..|
|00000880| 09 ec 10 c9 20 22 41 22 | 3a 6a 75 67 25 3d 31 0d |.... "A"|:jug%=1.|
|00000890| 09 f6 10 c9 20 22 42 22 | 3a 6a 75 67 25 3d 32 0d |.... "B"|:jug%=2.|
|000008a0| 0a 00 10 c9 20 22 43 22 | 3a 6a 75 67 25 3d 33 0d |.... "C"|:jug%=3.|
|000008b0| 0a 0a 10 c9 20 22 44 22 | 3a 6a 75 67 25 3d 34 0d |.... "D"|:jug%=4.|
|000008c0| 0a 0f 05 cb 0d 0a 14 18 | e6 20 30 2c 30 3a 64 68 |........|. 0,0:dh|
|000008d0| 25 3d 2d 64 68 25 28 6a | 75 67 25 29 0d 0a 1e 58 |%=-dh%(j|ug%)...X|
|000008e0| c8 93 20 c8 90 20 28 6f | 72 69 67 69 6e 78 25 28 |.. .. (o|riginx%(|
|000008f0| 6a 75 67 25 29 2d 72 25 | 28 6a 75 67 25 29 29 2c |jug%)-r%|(jug%)),|
|00000900| 6f 72 69 67 69 6e 79 25 | 2b 68 25 28 6a 75 67 25 |originy%|+h%(jug%|
|00000910| 29 2a 76 6f 6c 25 28 6a | 75 67 25 29 2f 56 25 28 |)*vol%(j|ug%)/V%(|
|00000920| 6a 75 67 25 29 2c 32 2a | 72 25 28 6a 75 67 25 29 |jug%),2*|r%(jug%)|
|00000930| 2c 64 68 25 0d 0a 23 12 | e6 20 30 2c 37 3a f2 64 |,dh%..#.|. 0,7:.d|
|00000940| 72 61 77 6a 75 67 0d 0a | 28 3e e7 20 64 68 25 3c |rawjug..|(>. dh%<|
|00000950| 30 20 8c 20 76 6f 6c 25 | 28 6a 75 67 25 29 3d 76 |0 . vol%|(jug%)=v|
|00000960| 6f 6c 25 28 6a 75 67 25 | 29 2d 31 20 8b 76 6f 6c |ol%(jug%|)-1 .vol|
|00000970| 25 28 6a 75 67 25 29 3d | 76 6f 6c 25 28 6a 75 67 |%(jug%)=|vol%(jug|
|00000980| 25 29 2b 31 0d 0a 2b 3b | ef 35 3a ec 20 6f 72 69 |%)+1..+;|.5:. ori|
|00000990| 67 69 6e 78 25 28 6a 75 | 67 25 29 2d 31 36 2c 6f |ginx%(ju|g%)-16,o|
|000009a0| 72 69 67 69 6e 79 25 2d | 31 36 3a e6 20 30 2e 30 |riginy%-|16:. 0.0|
|000009b0| 3a f1 3b 76 6f 6c 25 28 | 6a 75 67 25 29 2b 31 0d |:.;vol%(|jug%)+1.|
|000009c0| 0a 2c 36 ec 20 6f 72 69 | 67 69 6e 78 25 28 6a 75 |.,6. ori|ginx%(ju|
|000009d0| 67 25 29 2d 31 36 2c 6f | 72 69 67 69 6e 79 25 2d |g%)-16,o|riginy%-|
|000009e0| 31 36 3a e6 20 30 2c 37 | 3a f1 3b 76 6f 6c 25 28 |16:. 0,7|:.;vol%(|
|000009f0| 6a 75 67 25 29 0d 0a 2d | 1f e7 20 76 6f 6c 25 28 |jug%)..-|.. vol%(|
|00000a00| 6a 75 67 25 29 3d 30 20 | 8c 20 73 74 6f 70 70 6f |jug%)=0 |. stoppo|
|00000a10| 75 72 3d b9 0d 0a 32 0c | c8 8e 20 74 6f 24 20 ca |ur=...2.|.. to$ .|
|00000a20| 0d 0a 3c 10 c9 20 22 41 | 22 3a 6a 75 67 25 3d 31 |..<.. "A|":jug%=1|
|00000a30| 0d 0a 46 10 c9 20 22 42 | 22 3a 6a 75 67 25 3d 32 |..F.. "B|":jug%=2|
|00000a40| 0d 0a 50 10 c9 20 22 43 | 22 3a 6a 75 67 25 3d 33 |..P.. "C|":jug%=3|
|00000a50| 0d 0a 5a 10 c9 20 22 44 | 22 3a 6a 75 67 25 3d 34 |..Z.. "D|":jug%=4|
|00000a60| 0d 0a 64 05 cb 0d 0a 6e | 17 e6 20 30 2c 37 3a 64 |..d....n|.. 0,7:d|
|00000a70| 68 25 3d 64 68 25 28 6a | 75 67 25 29 0d 0a 73 58 |h%=dh%(j|ug%)..sX|
|00000a80| c8 93 20 c8 90 20 28 6f | 72 69 67 69 6e 78 25 28 |.. .. (o|riginx%(|
|00000a90| 6a 75 67 25 29 2d 72 25 | 28 6a 75 67 25 29 29 2c |jug%)-r%|(jug%)),|
|00000aa0| 6f 72 69 67 69 6e 79 25 | 2b 68 25 28 6a 75 67 25 |originy%|+h%(jug%|
|00000ab0| 29 2a 76 6f 6c 25 28 6a | 75 67 25 29 2f 56 25 28 |)*vol%(j|ug%)/V%(|
|00000ac0| 6a 75 67 25 29 2c 32 2a | 72 25 28 6a 75 67 25 29 |jug%),2*|r%(jug%)|
|00000ad0| 2c 64 68 25 0d 0a 78 3e | e7 20 64 68 25 3c 30 20 |,dh%..x>|. dh%<0 |
|00000ae0| 8c 20 76 6f 6c 25 28 6a | 75 67 25 29 3d 76 6f 6c |. vol%(j|ug%)=vol|
|00000af0| 25 28 6a 75 67 25 29 2d | 31 20 8b 76 6f 6c 25 28 |%(jug%)-|1 .vol%(|
|00000b00| 6a 75 67 25 29 3d 76 6f | 6c 25 28 6a 75 67 25 29 |jug%)=vo|l%(jug%)|
|00000b10| 2b 31 0d 0a 7b 38 ec 20 | 6f 72 69 67 69 6e 78 25 |+1..{8. |originx%|
|00000b20| 28 6a 75 67 25 29 2d 31 | 36 2c 6f 72 69 67 69 6e |(jug%)-1|6,origin|
|00000b30| 79 25 2d 31 36 3a e6 20 | 30 2c 30 3a f1 3b 76 6f |y%-16:. |0,0:.;vo|
|00000b40| 6c 25 28 6a 75 67 25 29 | 2d 31 0d 0a 7c 36 ec 20 |l%(jug%)|-1..|6. |
|00000b50| 6f 72 69 67 69 6e 78 25 | 28 6a 75 67 25 29 2d 31 |originx%|(jug%)-1|
|00000b60| 36 2c 6f 72 69 67 69 6e | 79 25 2d 31 36 3a e6 20 |6,origin|y%-16:. |
|00000b70| 30 2c 37 3a f1 3b 76 6f | 6c 25 28 6a 75 67 25 29 |0,7:.;vo|l%(jug%)|
|00000b80| 0d 0a 7d 26 e7 20 76 6f | 6c 25 28 6a 75 67 25 29 |..}&. vo|l%(jug%)|
|00000b90| 3d 56 25 28 6a 75 67 25 | 29 20 8c 20 73 74 6f 70 |=V%(jug%|) . stop|
|00000ba0| 70 6f 75 72 3d b9 0d 0a | 7f 0b 59 3d a6 28 35 30 |pour=...|..Y=.(50|
|00000bb0| 29 0d 0a 82 0e fd 20 73 | 74 6f 70 70 6f 75 72 0d |)..... s|toppour.|
|00000bc0| 0a 87 06 ef 34 0d 0a 8c | 05 e1 0d 0b b8 10 dd f2 |....4...|........|
|00000bd0| 6a 75 67 66 69 6c 6c 69 | 6e 67 0d 0b cc 0b 63 6f |jugfilli|ng....co|
|00000be0| 75 6e 74 3d 30 0d 0b d6 | 23 ef 35 3a ec 20 30 2c |unt=0...|#.5:. 0,|
|00000bf0| 34 30 30 3a f1 3b 22 43 | 4f 55 4e 54 3d 22 3b 63 |400:.;"C|OUNT=";c|
|00000c00| 6f 75 6e 74 20 3a ef 34 | 0d 0b e0 05 f5 0d 0b e5 |ount :.4|........|
|00000c10| 0a 45 58 49 54 3d a3 0d | 0b ea 08 c8 97 20 ee 0d |.EXIT=..|..... ..|
|00000c20| 0b ef 0b 2a 46 58 32 31 | 2c 39 0d 0b f4 35 db 3a |...*FX21|,9...5.:|
|00000c30| f1 27 27 22 55 53 45 20 | 54 48 45 20 4d 4f 55 53 |.''"USE |THE MOUS|
|00000c40| 45 20 54 4f 20 53 45 4c | 45 43 54 20 57 48 49 43 |E TO SEL|ECT WHIC|
|00000c50| 48 20 54 4f 20 50 4f 55 | 52 20 46 52 4f 4d 22 0d |H TO POU|R FROM".|
|00000c60| 0b f9 20 f5 3a c8 97 20 | 78 2c 79 2c 62 75 74 74 |.. .:.. |x,y,butt|
|00000c70| 6f 6e 25 3a fd 20 62 75 | 74 74 6f 6e 25 3d 30 0d |on%:. bu|tton%=0.|
|00000c80| 0b fe 22 f5 3a c8 97 20 | 78 2c 79 2c 20 62 75 74 |..".:.. |x,y, but|
|00000c90| 74 6f 6e 25 3a fd 20 62 | 75 74 74 6f 6e 25 3c 3e |ton%:. b|utton%<>|
|00000ca0| 30 0d 0c 08 0a 6a 75 67 | 25 3d 30 0d 0c 12 05 f5 |0....jug|%=0.....|
|00000cb0| 0d 0c 1c 21 6a 75 67 25 | 3d 6a 75 67 25 2b 31 3a |...!jug%|=jug%+1:|
|00000cc0| e7 20 6a 75 67 25 3e 34 | 20 8c 20 e5 20 8d 64 7e |. jug%>4| . . .d~|
|00000cd0| 4b 0d 0c 26 3d fd 20 6f | 72 69 67 69 6e 78 25 28 |K..&=. o|riginx%(|
|00000ce0| 6a 75 67 25 29 2d 72 25 | 28 6a 75 67 25 29 3c 3d |jug%)-r%|(jug%)<=|
|00000cf0| 78 20 80 20 6f 72 69 67 | 69 6e 78 25 28 6a 75 67 |x . orig|inx%(jug|
|00000d00| 25 29 2b 72 25 28 6a 75 | 67 25 29 3e 3d 78 0d 0c |%)+r%(ju|g%)>=x..|
|00000d10| 2b 51 e7 20 76 6f 6c 25 | 28 6a 75 67 25 29 3d 30 |+Q. vol%|(jug%)=0|
|00000d20| 20 8c 20 ef 37 3a f1 27 | 27 22 45 4d 50 54 59 20 | . .7:.'|'"EMPTY |
|00000d30| 4a 55 47 21 20 2d 20 54 | 52 59 20 41 47 41 49 4e |JUG! - T|RY AGAIN|
|00000d40| 2e 22 27 27 22 50 52 45 | 53 53 20 41 4e 59 20 4b |."''"PRE|SS ANY K|
|00000d50| 45 59 2e 22 3a 58 3d a5 | 3a e5 20 8d 64 74 4b 0d |EY.":X=.|:. .dtK.|
|00000d60| 0c 30 0d c8 8e 20 6a 75 | 67 25 20 ca 0d 0c 3a 15 |.0... ju|g% ...:.|
|00000d70| 20 20 20 20 c9 20 31 3a | 66 72 6f 6d 24 3d 22 41 |    . 1:|from$="A|
|00000d80| 22 0d 0c 44 15 20 20 20 | 20 c9 20 32 3a 66 72 6f |"..D.   | . 2:fro|
|00000d90| 6d 24 3d 22 42 22 0d 0c | 4e 15 20 20 20 20 c9 20 |m$="B"..|N.    . |
|00000da0| 33 3a 66 72 6f 6d 24 3d | 22 43 22 0d 0c 58 15 20 |3:from$=|"C"..X. |
|00000db0| 20 20 20 c9 20 34 3a 66 | 72 6f 6d 24 3d 22 44 22 |   . 4:f|rom$="D"|
|00000dc0| 0d 0c 6c 05 cb 0d 0c 76 | 31 f1 27 22 50 4f 55 52 |..l....v|1.'"POUR|
|00000dd0| 20 46 52 4f 4d 20 22 3b | 66 72 6f 6d 24 3a c8 96 | FROM ";|from$:..|
|00000de0| 3a f1 27 27 22 50 52 45 | 53 53 41 4e 59 20 4b 45 |:.''"PRE|SSANY KE|
|00000df0| 59 22 3a 58 3d a5 0d 0c | 79 0b 2a 46 58 32 31 2c |Y":X=...|y.*FX21,|
|00000e00| 39 0d 0c 7b 32 f1 27 27 | 22 55 53 45 20 54 48 45 |9..{2.''|"USE THE|
|00000e10| 20 4d 4f 55 53 45 20 54 | 4f 20 53 45 4c 45 43 54 | MOUSE T|O SELECT|
|00000e20| 20 57 48 49 43 48 20 54 | 4f 20 50 4f 55 52 20 54 | WHICH T|O POUR T|
|00000e30| 4f 20 22 0d 0c 7d 20 f5 | 3a c8 97 20 78 2c 79 2c |O "..} .|:.. x,y,|
|00000e40| 62 75 74 74 6f 6e 25 3a | fd 20 62 75 74 74 6f 6e |button%:|. button|
|00000e50| 25 3d 30 0d 0f a0 23 f5 | 3a 20 c8 97 20 78 2c 79 |%=0...#.|: .. x,y|
|00000e60| 2c 62 75 74 74 6f 6e 25 | 3a fd 20 62 75 74 74 6f |,button%|:. butto|
|00000e70| 6e 25 20 3c 3e 30 0d 0f | aa 0a 6a 75 67 25 3d 30 |n% <>0..|..jug%=0|
|00000e80| 0d 0f b4 05 f5 0d 0f be | 1d 6a 75 67 25 2b 3d 31 |........|.jug%+=1|
|00000e90| 3a e7 20 6a 75 67 25 3e | 34 20 8c 20 e5 20 8d 44 |:. jug%>|4 . . .D|
|00000ea0| 7b 4c 0d 0f c8 3d fd 20 | 78 3e 3d 6f 72 69 67 69 |{L...=. |x>=origi|
|00000eb0| 6e 78 25 28 6a 75 67 25 | 29 2d 72 25 28 6a 75 67 |nx%(jug%|)-r%(jug|
|00000ec0| 25 29 20 80 20 78 3c 3d | 6f 72 69 67 69 6e 78 25 |%) . x<=|originx%|
|00000ed0| 28 6a 75 67 25 29 2b 72 | 25 28 6a 75 67 25 29 0d |(jug%)+r|%(jug%).|
|00000ee0| 0f cd 66 e7 20 76 6f 6c | 25 28 6a 75 67 25 29 3d |..f. vol|%(jug%)=|
|00000ef0| 56 25 28 6a 75 67 25 29 | 20 8c 20 ef 37 3a f1 27 |V%(jug%)| . .7:.'|
|00000f00| 27 22 4a 55 47 20 46 55 | 4c 4c 20 2d 20 54 4f 20 |'"JUG FU|LL - TO |
|00000f10| 41 56 4f 49 44 20 53 50 | 49 4c 4c 41 47 45 2c 54 |AVOID SP|ILLAGE,T|
|00000f20| 52 59 20 41 47 41 49 4e | 2e 20 20 50 52 45 53 53 |RY AGAIN|.  PRESS|
|00000f30| 20 41 4e 59 20 4b 45 59 | 2e 22 3a 58 3d a5 3a e5 | ANY KEY|.":X=.:.|
|00000f40| 20 8d 44 7b 4c 0d 0f d2 | 0d c8 8e 20 6a 75 67 25 | .D{L...|... jug%|
|00000f50| 20 ca 0d 0f dc 13 20 20 | 20 20 c9 20 31 3a 74 6f | .....  |  . 1:to|
|00000f60| 24 3d 22 41 22 0d 0f e6 | 13 20 20 20 20 c9 20 32 |$="A"...|.    . 2|
|00000f70| 3a 74 6f 24 3d 22 42 22 | 0d 0f f0 13 20 20 20 20 |:to$="B"|....    |
|00000f80| c9 20 33 3a 74 6f 24 3d | 22 43 22 0d 0f fa 14 20 |. 3:to$=|"C".... |
|00000f90| 20 20 20 c9 20 34 3a 20 | 74 6f 24 3d 22 44 22 0d |   . 4: |to$="D".|
|00000fa0| 0f ff 05 cb 0d 10 04 11 | e7 20 74 6f 24 3d 66 72 |........|. to$=fr|
|00000fb0| 6f 6d 24 20 8c 0d 10 05 | 3b f1 22 4f 4f 50 53 21 |om$ ....|;."OOPS!|
|00000fc0| 20 46 52 4f 4d 20 61 6e | 64 20 54 4f 20 73 61 6d | FROM an|d TO sam|
|00000fd0| 65 6a 75 67 21 20 50 52 | 45 53 53 20 41 4e 59 20 |ejug! PR|ESS ANY |
|00000fe0| 4b 45 59 2e 22 3a 58 3d | a5 3a e5 20 8d 44 7b 4c |KEY.":X=|.:. .D{L|
|00000ff0| 0d 10 06 05 cd 0d 10 0e | 15 f1 27 27 22 50 4f 55 |........|..''"POU|
|00001000| 52 20 54 4f 20 22 3b 74 | 6f 24 0d 10 18 20 f2 70 |R TO ";t|o$... .p|
|00001010| 6f 75 72 6a 75 67 73 28 | 66 72 6f 6d 24 2c 74 6f |ourjugs(|from$,to|
|00001020| 24 29 20 3a 6a 75 67 25 | 3d 30 0d 10 22 12 63 6f |$) :jug%|=0..".co|
|00001030| 75 6e 74 20 3d 63 6f 75 | 6e 74 2b 31 0d 10 2c 27 |unt =cou|nt+1..,'|
|00001040| ef 35 3a ec 20 30 2c 34 | 30 30 3a e6 20 30 2c 30 |.5:. 0,4|00:. 0,0|
|00001050| 3a f1 3b 22 43 4f 55 4e | 54 3d 22 3b 63 6f 75 6e |:.;"COUN|T=";coun|
|00001060| 74 2d 31 0d 10 2d 25 ec | 20 30 2c 34 30 30 3a e6 |t-1..-%.| 0,400:.|
|00001070| 20 30 2c 37 3a f1 3b 22 | 43 4f 55 4e 54 3d 22 3b | 0,7:.;"|COUNT=";|
|00001080| 63 6f 75 6e 74 3a ef 34 | 0d 10 40 38 f1 27 27 22 |count:.4|..@8.''"|
|00001090| 50 52 45 53 53 20 51 20 | 54 4f 20 45 58 49 54 2c |PRESS Q |TO EXIT,|
|000010a0| 20 41 4e 59 20 4f 54 48 | 45 52 20 4b 45 59 20 54 | ANY OTH|ER KEY T|
|000010b0| 4f 20 43 4f 4e 54 49 4e | 55 45 2e 22 3a 58 3d a5 |O CONTIN|UE.":X=.|
|000010c0| 0d 10 43 1c 20 e7 20 58 | 3d 31 31 33 20 84 20 58 |..C. . X|=113 . X|
|000010d0| 3d 38 31 20 8c 20 45 58 | 49 54 3d b9 0d 10 4a 0a |=81 . EX|IT=...J.|
|000010e0| fd 20 45 58 49 54 0d 10 | 54 22 e8 27 27 22 41 4e |. EXIT..|T".''"AN|
|000010f0| 4f 54 48 45 52 20 47 4f | 3f 20 28 59 20 4f 52 20 |OTHER GO|? (Y OR |
|00001100| 4e 29 22 2c 61 6e 73 24 | 0d 10 5e 32 e7 20 61 6e |N)",ans$|..^2. an|
|00001110| 73 24 3d 22 59 22 20 84 | 20 61 6e 73 24 3d 22 79 |s$="Y" .| ans$="y|
|00001120| 22 20 8c 20 f2 72 65 73 | 65 74 6a 75 67 73 3a f2 |" . .res|etjugs:.|
|00001130| 6a 75 67 66 69 6c 6c 69 | 6e 67 0d 10 68 05 e1 0d |jugfilli|ng..h...|
|00001140| 10 cc 0f dd f2 72 65 73 | 65 74 6a 75 67 73 0d 10 |.....res|etjugs..|
|00001150| d6 0f e3 20 6e 25 3d 20 | 31 20 b8 20 33 0d 10 db |... n%= |1 . 3...|
|00001160| 13 e7 20 76 6f 6c 25 28 | 6e 25 29 3c 3e 30 20 8c |.. vol%(|n%)<>0 .|
|00001170| 0d 10 e0 1a 66 72 6f 6d | 24 3d bd 28 6e 25 2b 36 |....from|$=.(n%+6|
|00001180| 34 29 3a 74 6f 24 3d 22 | 44 22 0d 10 ea 18 f2 70 |4):to$="|D".....p|
|00001190| 6f 75 72 6a 75 67 73 28 | 66 72 6f 6d 24 2c 74 6f |ourjugs(|from$,to|
|000011a0| 24 29 0d 10 ef 05 cd 0d | 10 f4 08 ed 20 6e 25 0d |$)......|.... n%.|
|000011b0| 11 12 2f db 3a f1 22 52 | 45 41 44 59 20 57 48 45 |../.:."R|EADY WHE|
|000011c0| 4e 20 59 4f 55 20 41 52 | 45 20 2d 20 50 52 45 53 |N YOU AR|E - PRES|
|000011d0| 53 20 41 4e 59 20 4b 45 | 59 22 3a 58 3d a5 0d 11 |S ANY KE|Y":X=...|
|000011e0| 26 24 ef 35 3a ec 20 30 | 2c 34 30 30 3a e6 30 2c |&$.5:. 0|,400:.0,|
|000011f0| 30 3a f1 3b 22 43 4f 55 | 4e 54 3d 22 3b 63 6f 75 |0:.;"COU|NT=";cou|
|00001200| 6e 74 0d 11 30 2d 63 6f | 75 6e 74 20 3d 30 3a ec |nt..0-co|unt =0:.|
|00001210| 20 30 2c 34 30 30 3a e6 | 30 2c 37 3a f1 3b 22 43 | 0,400:.|0,7:.;"C|
|00001220| 4f 55 4e 54 3d 22 3b 63 | 6f 75 6e 74 3a ef 34 0d |OUNT=";c|ount:.4.|
|00001230| 11 3a 05 e1 0d 13 88 0f | dd f2 6a 75 67 6d 65 74 |.:......|..jugmet|
|00001240| 68 6f 64 0d 13 92 4b db | 3a f1 27 27 22 37 32 20 |hod...K.|:.''"72 |
|00001250| 50 49 4e 54 53 20 64 69 | 76 69 64 65 64 20 65 71 |PINTS di|vided eq|
|00001260| 75 61 6c 6c 79 20 62 65 | 74 77 65 65 6e 20 42 2c |ually be|tween B,|
|00001270| 43 20 61 6e 64 20 44 20 | 6d 65 61 6e 73 20 32 34 |C and D |means 24|
|00001280| 70 69 6e 74 73 20 69 6e | 20 65 61 63 68 22 0d 13 |pints in| each"..|
|00001290| 9c 29 f1 27 22 4a 55 47 | 20 44 20 63 61 6e 20 6f |.).'"JUG| D can o|
|000012a0| 6e 6c 79 20 61 63 74 20 | 61 73 20 61 20 72 65 73 |nly act |as a res|
|000012b0| 65 72 76 6f 69 72 22 0d | 13 a6 b8 20 f1 27 27 22 |ervoir".|... .''"|
|000012c0| 4a 55 47 53 20 42 20 61 | 6e 64 20 43 20 68 61 76 |JUGS B a|nd C hav|
|000012d0| 65 20 74 68 65 20 73 61 | 6d 65 20 63 61 70 61 63 |e the sa|me capac|
|000012e0| 69 74 79 20 73 6f 20 69 | 74 20 64 6f 65 73 6e 27 |ity so i|t doesn'|
|000012f0| 74 20 6d 61 74 74 65 72 | 20 77 68 69 63 68 20 6f |t matter| which o|
|00001300| 6e 65 20 69 73 20 66 69 | 6c 6c 65 64 20 66 69 72 |ne is fi|lled fir|
|00001310| 73 74 20 2d 20 74 72 61 | 6e 73 66 65 72 73 20 62 |st - tra|nsfers b|
|00001320| 65 74 77 65 65 6e 20 42 | 20 61 6e 64 20 43 20 6f |etween B| and C o|
|00001330| 72 20 76 69 63 65 20 76 | 65 72 73 61 20 77 6f 75 |r vice v|ersa wou|
|00001340| 6c 64 20 73 69 6d 70 6c | 79 20 77 61 73 74 65 20 |ld simpl|y waste |
|00001350| 61 20 27 67 6f 27 20 20 | 20 20 20 20 20 28 50 52 |a 'go'  |     (PR|
|00001360| 45 53 53 41 4e 59 4b 45 | 59 29 22 3a 58 3d a5 0d |ESSANYKE|Y)":X=..|
|00001370| 13 b0 38 f1 27 27 22 4a | 55 47 20 41 20 6d 75 73 |..8.''"J|UG A mus|
|00001380| 74 20 73 6f 6d 65 68 6f | 77 20 61 63 74 20 61 73 |t someho|w act as|
|00001390| 20 74 68 65 20 67 72 61 | 64 75 61 74 65 64 20 6d | the gra|duated m|
|000013a0| 65 61 73 75 72 65 22 0d | 13 ba 37 f1 27 27 22 32 |easure".|..7.''"2|
|000013b0| 34 70 69 6e 74 73 20 69 | 73 20 32 20 6c 6f 74 73 |4pints i|s 2 lots|
|000013c0| 20 6f 66 20 31 31 2c 20 | 70 6c 75 73 20 32 3a 20 | of 11, |plus 2: |
|000013d0| 68 6f 77 20 74 6f 20 67 | 65 74 20 32 3f 22 0d 13 |how to g|et 2?"..|
|000013e0| c4 69 f1 27 27 22 54 68 | 72 65 65 20 74 72 61 6e |.i.''"Th|ree tran|
|000013f0| 73 66 65 72 73 20 66 72 | 6f 6d 20 44 20 74 6f 20 |sfers fr|om D to |
|00001400| 41 20 65 61 63 68 20 66 | 6f 6c 6c 6f 77 65 64 20 |A each f|ollowed |
|00001410| 62 79 20 41 20 74 6f 20 | 42 20 77 69 6c 6c 20 67 |by A to |B will g|
|00001420| 69 76 65 20 33 32 20 69 | 6e 20 20 20 20 42 20 61 |ive 32 i|n    B a|
|00001430| 61 6e 64 20 6c 65 61 76 | 65 20 31 20 70 69 6e 74 |and leav|e 1 pint|
|00001440| 20 69 6e 20 41 3a 22 0d | 13 ce 05 f5 0d 13 d8 19 | in A:".|........|
|00001450| 20 20 20 20 66 72 6f 6d | 24 3d 22 44 22 3a 74 6f |    from|$="D":to|
|00001460| 24 3d 22 41 22 0d 13 ec | 1c 20 20 20 20 f2 70 6f |$="A"...|.    .po|
|00001470| 75 72 6a 75 67 73 28 66 | 72 6f 6d 24 2c 74 6f 24 |urjugs(f|rom$,to$|
|00001480| 29 0d 13 f6 05 20 0d 14 | 00 19 20 20 20 20 66 72 |).... ..|..    fr|
|00001490| 6f 6d 24 3d 22 41 22 3a | 74 6f 24 3d 22 42 22 0d |om$="A":|to$="B".|
|000014a0| 14 14 1c 20 20 20 20 f2 | 70 6f 75 72 6a 75 67 73 |...    .|pourjugs|
|000014b0| 28 66 72 6f 6d 24 2c 74 | 6f 24 29 0d 14 28 13 fd |(from$,t|o$)..(..|
|000014c0| 20 76 6f 6c 25 28 32 29 | 3d 56 25 28 32 29 0d 14 | vol%(2)|=V%(2)..|
|000014d0| 32 49 f1 27 27 22 45 6d | 70 74 79 20 42 20 69 6e |2I.''"Em|pty B in|
|000014e0| 74 6f 20 74 68 65 20 72 | 65 73 65 72 76 6f 69 72 |to the r|eservoir|
|000014f0| 20 44 2c 20 61 6e 64 20 | 74 68 65 6e 20 70 6f 75 | D, and |then pou|
|00001500| 72 20 74 68 65 20 70 69 | 6e 74 20 69 6e 20 41 20 |r the pi|nt in A |
|00001510| 69 6e 74 6f 20 42 22 0d | 14 3c 2a 66 72 6f 6d 24 |into B".|.<*from$|
|00001520| 3d 22 42 22 3a 74 6f 24 | 3d 22 44 22 3a f2 70 6f |="B":to$|="D":.po|
|00001530| 75 72 6a 75 67 73 28 66 | 72 6f 6d 24 2c 74 6f 24 |urjugs(f|rom$,to$|
|00001540| 29 0d 14 46 2a 66 72 6f | 6d 24 3d 22 41 22 3a 74 |)..F*fro|m$="A":t|
|00001550| 6f 24 3d 22 42 22 3a f2 | 70 6f 75 72 6a 75 67 73 |o$="B":.|pourjugs|
|00001560| 28 66 72 6f 6d 24 2c 74 | 6f 24 29 0d 14 50 3a f1 |(from$,t|o$)..P:.|
|00001570| 27 27 22 52 65 70 65 61 | 74 69 6e 67 20 74 68 65 |''"Repea|ting the|
|00001580| 73 65 20 38 20 70 6f 75 | 72 69 6e 67 73 20 77 69 |se 8 pou|rings wi|
|00001590| 6c 6c 20 70 75 74 20 32 | 70 69 6e 74 73 20 69 6e |ll put 2|pints in|
|000015a0| 74 6f 20 42 22 0d 14 5a | 0b 70 6f 75 72 25 3d 30 |to B"..Z|.pour%=0|
|000015b0| 0d 14 64 1c 70 6f 75 72 | 24 3d 22 44 41 41 42 44 |..d.pour|$="DAABD|
|000015c0| 41 41 42 44 41 41 42 42 | 44 41 42 22 0d 14 6e 05 |AABDAABB|DAB"..n.|
|000015d0| f5 0d 14 78 10 20 20 20 | 20 70 6f 75 72 25 2b 3d |...x.   | pour%+=|
|000015e0| 31 0d 14 82 1d 20 20 20 | 20 66 72 6f 6d 24 3d c1 |1....   | from$=.|
|000015f0| 70 6f 75 72 24 2c 70 6f | 75 72 25 2c 31 29 0d 14 |pour$,po|ur%,1)..|
|00001600| 8c 10 20 20 20 20 70 6f | 75 72 25 2b 3d 31 0d 14 |..    po|ur%+=1..|
|00001610| 96 1b 20 20 20 20 74 6f | 24 3d c1 70 6f 75 72 24 |..    to|$=.pour$|
|00001620| 2c 70 6f 75 72 25 2c 31 | 29 0d 14 a0 1c 20 20 20 |,pour%,1|)....   |
|00001630| 20 f2 70 6f 75 72 6a 75 | 67 73 28 66 72 6f 6d 24 | .pourju|gs(from$|
|00001640| 2c 74 6f 24 29 0d 14 aa | 0e fd 20 70 6f 75 72 25 |,to$)...|.. pour%|
|00001650| 3d 31 36 0d 14 b4 4c f1 | 27 27 22 32 20 73 65 71 |=16...L.|''"2 seq|
|00001660| 75 65 6e 63 65 73 20 66 | 72 6f 6d 20 44 20 74 6f |uences f|rom D to|
|00001670| 20 41 20 61 6e 64 20 41 | 20 74 6f 20 42 20 28 65 | A and A| to B (e|
|00001680| 61 63 68 20 6f 66 20 31 | 31 29 20 67 69 76 65 73 |ach of 1|1) gives|
|00001690| 20 32 34 20 70 69 6e 74 | 73 20 69 6e 20 42 22 0d | 24 pint|s in B".|
|000016a0| 14 be 1c 70 6f 75 72 25 | 3d 30 3a 70 6f 75 72 24 |...pour%|=0:pour$|
|000016b0| 3d 22 44 41 41 42 44 41 | 41 42 22 0d 14 c8 05 f5 |="DAABDA|AB".....|
|000016c0| 0d 14 d2 10 20 20 20 20 | 70 6f 75 72 25 2b 3d 31 |....    |pour%+=1|
|000016d0| 0d 14 dc 1d 20 20 20 20 | 66 72 6f 6d 24 3d c1 70 |....    |from$=.p|
|000016e0| 6f 75 72 24 2c 70 6f 75 | 72 25 2c 31 29 0d 14 e6 |our$,pou|r%,1)...|
|000016f0| 10 20 20 20 20 70 6f 75 | 72 25 2b 3d 31 0d 14 f0 |.    pou|r%+=1...|
|00001700| 1b 20 20 20 20 74 6f 24 | 3d c1 70 6f 75 72 24 2c |.    to$|=.pour$,|
|00001710| 70 6f 75 72 25 2c 31 29 | 0d 14 fa 1c 20 20 20 20 |pour%,1)|....    |
|00001720| f2 70 6f 75 72 6a 75 67 | 73 28 66 72 6f 6d 24 2c |.pourjug|s(from$,|
|00001730| 74 6f 24 29 0d 15 04 0d | fd 20 70 6f 75 72 25 3d |to$)....|. pour%=|
|00001740| 38 0d 15 0e 18 f1 27 27 | 22 50 52 45 53 53 41 4e |8.....''|"PRESSAN|
|00001750| 59 4b 45 59 22 3a 58 3d | a5 0d 15 18 8d db 3a f1 |YKEY":X=|......:.|
|00001760| 27 27 22 52 65 70 65 61 | 74 69 6e 67 20 74 68 65 |''"Repea|ting the|
|00001770| 73 65 20 70 6f 75 72 69 | 6e 67 73 20 62 75 74 20 |se pouri|ngs but |
|00001780| 75 73 69 6e 67 20 43 20 | 69 6e 73 74 65 61 64 20 |using C |instead |
|00001790| 6f 66 20 42 20 63 6f 6d | 70 6c 65 74 65 73 20 74 |of B com|pletes t|
|000017a0| 68 65 20 20 20 20 20 20 | 20 20 61 6e 73 77 65 72 |he      |  answer|
|000017b0| 20 2d 20 73 65 65 20 69 | 66 20 79 6f 75 20 63 61 | - see i|f you ca|
|000017c0| 6e 20 64 6f 20 69 74 2c | 20 73 74 61 72 74 69 6e |n do it,| startin|
|000017d0| 67 20 66 72 6f 6d 20 74 | 68 65 20 62 65 67 69 6e |g from t|he begin|
|000017e0| 6e 69 6e 67 21 22 0d 15 | 22 18 f1 27 27 22 50 52 |ning!"..|"..''"PR|
|000017f0| 45 53 53 41 4e 59 4b 45 | 59 22 3a 58 3d a5 0d 15 |ESSANYKE|Y":X=...|
|00001800| 2c 0e f2 72 65 73 65 74 | 6a 75 67 73 0d 15 36 0f |,..reset|jugs..6.|
|00001810| f2 6a 75 67 66 69 6c 6c | 69 6e 67 0d 15 40 05 e1 |.jugfill|ing..@..|
|00001820| 0d ff                   |                         |..      |        |
+--------+-------------------------+-------------------------+--------+--------+